{$CLEO .cm}
{$NOSOURCE}

0000:
:Start
0209: 2@ = random_int_in_ranges 0 10

if
2@ == 0
jf @MissingStep1  
4@ = -1438.9823 
5@ = -1511.9221 
6@ = 101.7511
jump @Abnormal
:MissingStep1
if
2@ == 1
jf @MissingStep2
4@ = -1463.1165 
5@ = -1458.7982 
6@ = 101.7578
jump @Abnormal
:MissingStep2
if
2@ == 2
jf @MissingStep3    
4@ = -1423.2504 
5@ = -1456.9595 
6@ = 101.6921
jump @Abnormal
:MissingStep3
if
2@ == 3
jf @MissingStep4 
4@ = -1411.3331  
5@ = -1524.8019 
6@ = 101.7199
jump @Abnormal
:MissingStep4
if
2@ == 4
jf @MissingStep5  
4@ = -1449.4965 
5@ = -1549.6389 
6@ = 111.698
jump @Abnormal
:MissingStep5
if
2@ == 5
jf @MissingStep6  
4@ = -1458.6304
5@ = -1483.6443 
6@ = 103.6484
jump @Abnormal
:MissingStep6
if
2@ == 6
jf @MissingStep7  
4@ = -1448.3949   
5@ = -1576.7555 
6@ = 111.2617
jump @Abnormal
:MissingStep7
if
2@ == 7
jf @MissingStep8 
4@ = -1445.6914
5@ = -1593.5847 
6@ = 101.7578
jump @Abnormal
:MissingStep8
if
2@ == 8
jf @MissingStep9    
4@ = -1422.9629 
5@ = -1503.703 
6@ = 111.2358
jump @Abnormal
:MissingStep9
if
2@ == 9
jf @MissingStep10    
4@ = -1440.1202 
5@ = -1497.51 
6@ = 101.7436
jump @Abnormal
:MissingStep10
4@ = -1434.8525 
5@ = -1534.4087 
6@ = 101.7558
                            

:Abnormal                     
1@ = Pickup.Create(#BODYARMOUR, 3, 4@, 5@, 6@)
018A: 7@ = create_checkpoint_at 4@ 5@ 6@
Marker.SetColor(7@, 3)


:Pogo_Pogo
wait 0
if
80A4:   actor $PLAYER_ACTOR sphere 0 in_cube_cornerA -1472.7187 -1429.8342 100.7136 cornerB -1399.9674 -1605.0201 1000.4005
jf @Pogi_Pogi
0215: destroy_pickup 1@
0164: disable_marker 7@
0A93: end_custom_thread


:Pogi_Pogi
if
Pickup.Picked_up(1@)
jf @Pogo_Pogo
0215: destroy_pickup 1@
0164: disable_marker 7@
wait 30000
jump @Start























